home *** CD-ROM | disk | FTP | other *** search
/ PC World Interactive 7 / PC World Interactive 7.iso / online / motor.EXE / Y.PAS < prev   
Pascal/Delphi Source File  |  1991-10-03  |  163b  |  11 lines
  1. uses crt,dos;
  2. var
  3. {$M 7000,0,100000}
  4. st,st1:string;
  5. begin
  6. readln(st);
  7. st1:='momy ';
  8. swapvectors;
  9. exec(getenv('comspec'),'/c' +st1 +ST);
  10. swapvectors;
  11. end.